perm filename GFTOPX.DIF[MF,ALS]1 blob sn#764518 filedate 1984-07-29 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00003 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	  1) GFTOPX.WEB[MF,ALS] and 2) GFTOPX.WEB[MF,SYS]	7-29-84 10:11	pages 3,3
C00005 00003	  1) GFTOPX.WEB[MF,ALS] and 2) GFTOPX.WEB[MF,SYS]	7-29-84 10:11	pages 10,10
C00007 ENDMK
C⊗;
  1) GFTOPX.WEB[MF,ALS] and 2) GFTOPX.WEB[MF,SYS]	7-29-84 10:11	pages 3,3

**** File 1) GFTOPX.WEB[MF,ALS]/3P/83L
1)	@!top_pixel=400; {boundary of pixel image of glyph}
1)	@!bot_pixel=-150;
1)	@!left_pixel=-150;
1)	@!right_pixel=400;
1)	@ Here are some macros for common programming idioms.
**** File 2) GFTOPX.WEB[MF,SYS]/3P/83L
2)	@!top_pixel=300; {boundary of pixel image of glyph}
2)	@!bot_pixel=-50;
2)	@!left_pixel=-150;
2)	@!right_pixel=300;
2)	@ Here are some macros for common programming idioms.
***************


**** File 1) GFTOPX.WEB[MF,ALS]/8P/243L
1)	print_ln('before: minx=',min_x:1,' maxx=',max_x:1,' miny=',min_y:1,' maxy=',max_y:1);
1)	gubed@/
**** File 2) GFTOPX.WEB[MF,SYS]/8P/243L
2)	print_ln('before: minx=',min_x:1,' maxx=',max_x:1,
2)		' miny=',min_y:1,' maxy=',max_y:1);
2)	gubed@/
***************


**** File 1) GFTOPX.WEB[MF,ALS]/8P/299L
1)	print_ln('after : minx=',min_x:1,' maxx=',max_x:1,' miny=',min_y:1,' maxy=',max_y:1);
1)	print_ln('cols=',cols:1,' rows=',rows:1);
**** File 2) GFTOPX.WEB[MF,SYS]/8P/300L
2)	print_ln('after : minx=',min_x:1,' maxx=',max_x:1,
2)		' miny=',min_y:1,' maxy=',max_y:1);
2)	print_ln('cols=',cols:1,' rows=',rows:1);
***************


**** File 1) GFTOPX.WEB[MF,ALS]/9P/92L
1)	if (q<0)∨(q>post_loc-3) then bad_gf('post pointer ',q:1,' at byte ',post_loc-3:1);
1)	@.post pointer is wrong@>
**** File 2) GFTOPX.WEB[MF,SYS]/9P/92L
2)	if (q<0)∨(q>post_loc-3) then
2)		bad_gf('post pointer ',q:1,' at byte ',post_loc-3:1);
2)	@.post pointer is wrong@>
***************


**** File 1) GFTOPX.WEB[MF,ALS]/10P/7L
1)	over the design point size that will occur if the \.{PXL} file is 
1)	used on a 200 pixel per inch output device.
  1) GFTOPX.WEB[MF,ALS] and 2) GFTOPX.WEB[MF,SYS]	7-29-84 10:11	pages 10,10

**** File 2) GFTOPX.WEB[MF,SYS]/10P/7L
2)	over the design point size that will occur if the \.{PXL} file is
2)	used on a 200 pixel per inch output device.
***************


**** File 1) GFTOPX.WEB[MF,ALS]/10P/22L
1)	of |max_x-min_x+1| for that particular glyph. Each white pixel is represented 
1)	by a zero and each black pixel is represented by a one in the corresponding bit
**** File 2) GFTOPX.WEB[MF,SYS]/10P/22L
2)	of |max_x-min_x+1| for that particular glyph. Each white pixel is represented
2)	by a zero and each black pixel is represented by a one in the corresponding bit
***************


**** File 1) GFTOPX.WEB[MF,ALS]/11P/75L
1)	char_code←get_two_bytes; char_code←get_two_bytes; 
1)	print('[',char_code:1);
**** File 2) GFTOPX.WEB[MF,SYS]/11P/75L
2)	char_code←get_two_bytes; char_code←get_two_bytes;
2)	print('[',char_code:1);
***************